﻿Public Class Pedido
    Dim nroPedido As Long
    Dim fechaCreacion As New DateTime()
    Dim fechaNecesidad As New DateTime()
    Dim estado As New Estado()
    Dim cliente As New Cliente()
    Dim fechaCancelacion As New DateTime()
    Dim motivoCancelacion As String
    Dim observaciones As String
    Dim direccionEntrega As String
    Dim vendedor As New Empleado()
    Dim detalle As New List(Of DetallePedido)

    Public Property _nroPedido As Long
        Get
            Return nroPedido
        End Get
        Set(ByVal value As Long)
            nroPedido = value
        End Set
    End Property
    Public Property _fechaCreacion As DateTime
        Get
            Return fechaCreacion
        End Get
        Set(ByVal value As DateTime)
            fechaCreacion = value
        End Set
    End Property
    Public Property _fechaNecesidad As DateTime
        Get
            Return fechaNecesidad
        End Get
        Set(ByVal value As DateTime)
            fechaNecesidad = value
        End Set
    End Property
    Public Property _estado As Estado
        Get
            Return estado
        End Get
        Set(ByVal value As Estado)
            estado = value
        End Set
    End Property
    Public Property _cliente As Cliente
        Get
            Return cliente
        End Get
        Set(ByVal value As Cliente)
            cliente = value
        End Set
    End Property
    Public Property _fechaCancelacion As DateTime
        Get
            Return fechaCancelacion
        End Get
        Set(ByVal value As DateTime)
            fechaCancelacion = value
        End Set
    End Property
    Public Property _motivoCancelacion As String
        Get
            Return motivoCancelacion
        End Get
        Set(ByVal value As String)
            motivoCancelacion = value
        End Set
    End Property
    Public Property _observaciones As String
        Get
            Return observaciones
        End Get
        Set(ByVal value As String)
            observaciones = value
        End Set
    End Property
    Public Property _direccionEntrega As String
        Get
            Return direccionEntrega
        End Get
        Set(ByVal value As String)
            direccionEntrega = value
        End Set
    End Property
    Public Property _vendedor As Empleado
        Get
            Return vendedor
        End Get
        Set(ByVal value As Empleado)
            vendedor = value
        End Set
    End Property
    Public Property _detalle As List(Of DetallePedido)
        Get
            Return detalle
        End Get
        Set(ByVal value As List(Of DetallePedido))
            detalle = value
        End Set
    End Property
End Class
